home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness: Critical Thinking Skills / Workplace Effectiveness: Critical Thinking Skills.iso / pc / Files / Patterns.dxr / 00003_Navigation handlers.ls < prev    next >
Encoding:
Text File  |  1998-09-16  |  1.8 KB  |  73 lines
  1. global gMasterData, gSection, buttonSp, coinSp, coinCoverSp, responseSp, answerButSp, greyScreenSp, numberPanelSp, chooseSkillSp, gExtendData, NexQuest
  2.  
  3. on goIntro
  4.   go(label("intro"))
  5.   goNarrator(gMasterData, "34")
  6.   set gSection to #intro
  7. end
  8.  
  9. on goExample
  10.   go("example")
  11.   goNarrator(gMasterData, "35")
  12.   set gSection to #example
  13.   setModule(gExtendData, #example)
  14.   setFingerCursor(#on, [answerButSp])
  15. end
  16.  
  17. on goChooseSkill
  18.   go("choose skill")
  19.   goNarrator(gMasterData, "36")
  20.   set gSection to #chooseSkill
  21.   setFingerCursor(#on, [chooseSkillSp])
  22. end
  23.  
  24. on goChallenge
  25.   stopSound2()
  26.   go("challenging")
  27.   goNarrator(gMasterData, "37")
  28.   set gSection to #challenge
  29.   setModule(gExtendData, #challenge)
  30.   setFingerCursor(#on, [numberPanelSp, answerButSp])
  31.   setHandCursor(#on, [coinSp, coinSp + 1, coinSp + 2])
  32. end
  33.  
  34. on goMoreChallenge
  35.   stopSound2()
  36.   go("more challenging")
  37.   goNarrator(gMasterData, "37")
  38.   set gSection to #moreChallenge
  39.   setModule(gExtendData, #more)
  40.   setFingerCursor(#on, [numberPanelSp, answerButSp])
  41.   setHandCursor(#on, [coinSp, coinSp + 1, coinSp + 2])
  42. end
  43.  
  44. on goMostChallenge
  45.   stopSound2()
  46.   go("most challenging")
  47.   goNarrator(gMasterData, "37")
  48.   set gSection to #MostChallenge
  49.   setModule(gExtendData, #most)
  50.   setFingerCursor(#on, [numberPanelSp, answerButSp])
  51.   setHandCursor(#on, [coinSp, coinSp + 1, coinSp + 2])
  52. end
  53.  
  54. on exitExample
  55.   cursor(0)
  56.   setFingerCursor(#off, [answerButSp])
  57. end
  58.  
  59. on exitChooseSkill
  60.   puppetSprite(2, 0)
  61.   setFingerCursor(#off, [chooseSkillSp])
  62. end
  63.  
  64. on exitANYSkill
  65.   set coinSp to 56
  66.   setPuppetState([responseSp, coinSp, greyScreenSp], #d, 0)
  67.   setBlanks(gExtendData, EMPTY, EMPTY, EMPTY)
  68.   setFingerCursor(#off, [numberPanelSp, answerButSp])
  69.   setHandCursor(#off, [coinSp, coinSp + 1, coinSp + 2])
  70.   cleanUpCoinSp()
  71.   updateStage()
  72. end
  73.